home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / BLACKBOX.EXE / remote.ini < prev    next >
INI File  |  1997-02-26  |  7KB  |  138 lines

  1. [Users]
  2. n0=
  3.  
  4. [Variables]
  5. n0=%text hello
  6. n1=%space  
  7. n2=%thischar h
  8. n3=%thislet á
  9. n4=%snick ($snick(0,$chan)) + 1
  10. n5=%mstr 
  11. n6=%num 1
  12. n7=%msg 
  13. n8=%mlen 10
  14. n9=%clone 0
  15. n10=%ircop 0
  16. n11=%op 0
  17. n12=%nonop 0
  18. n13=%voice 0
  19. n14=%here 0
  20. n15=%total 0
  21. n16=%novoice 0
  22. n17=%gone 0
  23. n18=%option 2
  24. n19=%chan
  25. n20=%window 
  26. n21=%pager OFF
  27. n22=%messages OFF
  28. n23=%mess 0
  29. n24=%temp 1797
  30. n25=%leettext 
  31. n26=%elitetext
  32. n27=%section Elite
  33. n28=%eliteconvertme 
  34. n29=%len 5
  35. n30=%rand 2
  36. n31=%thing 2
  37. n32=%backtext
  38. n33=%tmp = 
  39. n34=%bot W@channels2.undernet.org
  40. n35=%bad.word fuck shit cunt bitch goddamn $hit fuk dumbass
  41. n36=%WordCheck on
  42.  
  43. [Commands]
  44. n0=1:PING:/notice $nick Thanks for pinging me.....you ping has been recorded. Please wait 4-6 weeks for delivery of ping response.
  45. n1=1!:PAGE: {
  46. n2=  if (%pager = OFF) { .notice $nick My pager isn't on right now, you can leave me a message by typing /ctcp $me Message <message here> | .ignore -tu30 $nick 2 | halt }
  47. n3=  elseif (%pager = ON) { splay c:\waves\alarm.wav | echo 4 -a $nick is paging you!!! | .notice $nick Hopefully, I'll be here shortly =) | .ignore -tu30 $nick 2 }
  48. n4=}
  49. n5=1!:MESSAGE: {
  50. n6=  if (%messages = OFF) { .notice $nick I'm not taking any messages right now.  Guess I don't wanna be disturbed :-) | .ignore -tu30 $nick 2 | halt }
  51. n7=  elseif (%messages = ON) { write c:\Box\messages.txt On $fulldate $+ , $nick sent you this message: | write c:\Box\messages.txt $parm2* | write -i c:\Box\messages.txt | inc %mess | ignore -tu30 $nick 2 }
  52. n8=}
  53.  
  54. [Events]
  55. n0=
  56. n1=
  57. n2=#idlekick disabled
  58. n3=@1:ON NICK: {
  59. n4=  %t = $readini idle.ini idlekick $nick
  60. n5=  if (%t == $null) { writeini idle.ini idlekick $newnick $ctime }
  61. n6=  else { remini idle.ini idlekick $nick | writeini idle.ini idlekick $newnick %t }
  62. n7=  unset %t
  63. n8=}
  64. n9=@1:ON JOIN:%idlechan:/writeini idle.ini idlekick $nick $ctime
  65. n10=@1:ON TEXT:*:%idlechan:/writeini idle.ini idlekick $nick $ctime
  66. n11=@1:ON ACTION:*:%idlechan:/writeini idle.ini idlekick $nick $ctime
  67. n12=@1:ON PART:%idlechan: {
  68. n13=  if ($nick == $me) { .timer30 off | unset %seconds %idlechan | remini idle.ini idlekick | echo 2 -a IdleKick has been disabled for $chan $+ . | .disable #idlekick }
  69. n14=  else {
  70. n15=    %t = $readini idle.ini idlekick $nick
  71. n16=    if (%t == $null) { halt }
  72. n17=    else { remini idle.ini idlekick $nick }
  73. n18=    unset %t
  74. n19=  }
  75. n20=}
  76. n21=@1:ON KICK:%idlechan:{
  77. n22=  %t = $readini idle.ini idlekick $nick
  78. n23=  if (%t == $null) { halt }
  79. n24=  else { remini idle.ini idlekick $nick }
  80. n25=  unset %t
  81. n26=}
  82. n27=@1:ON QUIT:{
  83. n28=  %t = $readini idle.ini idlekick $nick
  84. n29=  if (%t == $null) { halt }
  85. n30=  else { remini idle.ini idlekick $nick }
  86. n31=  unset %t
  87. n32=}
  88. n33=#idlekick end
  89. n34=100:on text:.kbvote*:#: { 
  90. n35=  if (%vote != on) { 
  91. n36=    if ($parm2 !ison $chan) { notice $nick $parm2 is not here ! |  halt } 
  92. n37=    set %votechan $chan | set %subject we should Kick and Ban | set %votenick $parm2 | %rem = yes | %vote = on | .timer 1 45 endvote  | vote
  93. n38=  }
  94. n39=  else { echo 3 $me I am current running a  %game routine , Please allow me to finish. | halt }
  95. n40=}
  96. n41=#dice start
  97. n42=1:on text:!roll:#:notice $nick please use !Roll 1 - 10 d 1- 100 | ignore -au10 *!*@*  
  98. n43=1:on text:!roll * d *:#: {
  99. n44=  ignore -au10 *!*@*  
  100. n45=  if ($parm2 > 10) { msg $chan mAx Number of Die ExCeeDeD | set %x 10 | msg $chan  Set # of dIe - %x } | else { set %x $parm2 }
  101. n46=  if ($parm4 > 100) { msg $chan mAx Number Sides ExCeeDeD | set %y 100 | msg $chan  Set # of sIdEs - %y } | else { set %y $parm4 }
  102. n47=  ;make dice 
  103. n48=  set %i 1 | set %die ""
  104. n49=  :die
  105. n50=  set %x $+ %i $rand(1,%y) | inc %t % [ $+ [ x $+ [ %i ] ] ]
  106. n51=  %die = %die %i $+ d $+ % [ $+ [ x $+ [ %i ] ] ]
  107. n52=  inc %i 1 | if (%i <= %x) { goto die }
  108. n53=  msg $chan %die
  109. n54=  msg $chan %x dice rolled @ %y sides per die , total of %t
  110. n55=  :cleanup | unset %x $+ %x | dec %x 1
  111. n56=  if (%x != 0) { goto cleanup }
  112. n57=  unset %x | unset %i | unset %y | unset %t
  113. n58=  nhalt
  114. n59=}
  115. n60=#dice end
  116. n61=#vote start
  117. n62=1:on text:y:%votechan: { if ($nick = %votenick) { describe %votechan $nick you have no say in the matter! | ignore -acu7 $nick 3 | halt } | if ($remove($address($nick,2),*!*) isin %votesite) { notice $nick you have voted already |  ignore -acu7 $nick 3 | halt } |  inc %yes 1 | ignore -acu7 $nick 3 | notice $nick Your decision is YES | %votesite = %votesite $remove($address($nick,2),*!*) | halt  }
  118. n63=1:on text:n:%votechan: {  if ($nick = %votenick) { describe %votechan  $nick you have no say in the matter! | ignore -acu7 $nick 3 | halt } | if ($remove($address($nick,2),*!*) isin %votesite) { notice $nick you have voted already |  ignore -acu7 $nick 3 | halt }  |  inc %no 1 | ignore -acu7 $nick 3 | notice $nick Your decision is NO | %votesite = %votesite $remove($address($nick,2),*!*) |  halt }
  119. n64=1:on text:yes:%votechan: {  if ($nick = %votenick) { describe %votechan $nick you have no say in the matter! | ignore -acu7 $nick 3 | halt } | if ($remove($address($nick,2),*!*) isin %votesite) { notice $nick you have voted already |  ignore -acu7 $nick 3 | halt } |  inc %yes 1 | ignore -acu7 $nick 3 | notice $nick Your decision is YES | %votesite = %votesite $remove($address($nick,2),*!*) | halt  }
  120. n65=1:on text:no:%votechan: {  if ($nick = %votenick) { describe %votechan $nick you have no say in the matter! | ignore -acu7 $nick 3 | halt } | if ($remove($address($nick,2),*!*) isin %votesite) { notice $nick you have voted already |  ignore -acu7 $nick 3 | halt }  |  inc %no 1 | ignore -acu7 $nick 3 | notice $nick Your decision is NO | %votesite = %votesite $remove($address($nick,2),*!*) |  halt }
  121. n66=1:on nick:if ($nick = %votenick) { describe %votechan Now changing from %votenick to $newnick ,  ya can't hide =_o  | set %votenick $newnick } | unset %nick | halt
  122. n67=#vote end
  123. n68=1:on text:*:#: {
  124. n69=  if ($dl($nick) > 49) { halt }
  125. n70=  %parms = $parms 
  126. n71=  if (%WordCheck = ON) { if ($badword($token(0,32,%bad.word),%bad.word) = true) { kick $chan $nick Don't say " $+ %word $+ " ... LameBrain $dscript | halt } }
  127. n72=}
  128. n73=1:on action:*:#: {
  129. n74=  if ($dl($nick) > 49) { halt }
  130. n75=  %parms = $parms 
  131. n76=  if (%WordCheck = ON) { if ($badword($token(0,32,%bad.word),%bad.word) = true) { kick $chan $nick Don't say " $+ %word $+ " ... LameBrain $dscript | halt } }
  132. n77=}
  133. n78=1:on notice:*:#: {
  134. n79=  if ($dl($nick) > 49) { halt }
  135. n80=  %parms = $parms 
  136. n81=  if (%WordCheck = ON) { if ($badword($token(0,32,%bad.word),%bad.word) = true) { kick $chan $nick Don't say " $+ %word $+ " ... LameBrain $dscript | halt } }
  137. n82=}
  138.